BBS in a Box 15

home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-1.iso / Files / System 7 / Frontier / Frontier SDK 2.1.sit / Frontier SDK 2.1 / Toolkits / IAC Tools / iacdouble.c < prev next >
MacBinary | 1993-06-09 | 3.5 KB | [TEXT/KAHL]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, Wed Jun 9 15:44:20 1993, modified Wed Jun 9 15:44:20 1993, creator Think C, type ASCII, 2898 bytes "iacdouble.c" , at 0xbd2 402 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[KAHL]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 69 61 63 64 6f 75 | 62 6c 65 2e 63 00 00 00 |..iacdou|ble.c...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 00 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 0b 52 00 | 00 01 92 a8 3b ee 14 a8 |......R.|....;...|
|00000060| 3b ee 14 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |;.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 88 e4 00 00 |........|........|
|00000080| 0d 2f 2a a9 20 43 6f 70 | 79 72 69 67 68 74 20 31 |./*. Cop|yright 1|
|00000090| 39 38 38 2d 31 39 39 33 | 20 55 73 65 72 4c 61 6e |988-1993| UserLan|
|000000a0| 64 20 53 6f 66 74 77 61 | 72 65 2c 20 49 6e 63 2e |d Softwa|re, Inc.|
|000000b0| 20 20 41 6c 6c 20 52 69 | 67 68 74 73 20 52 65 73 |  All Ri|ghts Res|
|000000c0| 65 72 76 65 64 2e 2a 2f | 0d 0d 23 69 6e 63 6c 75 |erved.*/|..#inclu|
|000000d0| 64 65 20 22 69 61 63 69 | 6e 74 65 72 6e 61 6c 2e |de "iaci|nternal.|
|000000e0| 68 22 0d 0d 0d 23 69 66 | 20 5f 5f 6f 70 74 69 6f |h"...#if| __optio|
|000000f0| 6e 28 6d 63 36 38 38 38 | 31 29 20 7c 7c 20 21 5f |n(mc6888|1) || !_|
|00000100| 5f 6f 70 74 69 6f 6e 28 | 6e 61 74 69 76 65 5f 66 |_option(|native_f|
|00000110| 70 29 0d 0d 09 23 64 65 | 66 69 6e 65 20 75 73 65 |p)...#de|fine use|
|00000120| 53 61 6e 65 0d 09 0d 09 | 23 69 6e 63 6c 75 64 65 |Sane....|#include|
|00000130| 20 3c 73 61 6e 65 2e 68 | 3e 0d 09 0d 23 65 6c 73 | <sane.h|>...#els|
|00000140| 65 0d 09 0d 09 23 75 6e | 64 65 66 20 75 73 65 53 |e....#un|def useS|
|00000150| 61 6e 65 0d 09 0d 23 65 | 6e 64 69 66 0d 0d 0d 23 |ane...#e|ndif...#|
|00000160| 69 66 20 5f 5f 6f 70 74 | 69 6f 6e 20 28 64 6f 75 |if __opt|ion (dou|
|00000170| 62 6c 65 5f 38 29 0d 0d | 09 23 65 72 72 6f 72 20 |ble_8)..|.#error |
|00000180| 43 61 6e 27 74 20 63 6f | 6d 70 69 6c 65 20 74 68 |Can't co|mpile th|
|00000190| 69 73 20 70 72 6f 6a 65 | 63 74 20 77 69 74 68 20 |is proje|ct with |
|000001a0| 74 68 65 20 38 20 62 79 | 74 65 20 64 6f 75 62 6c |the 8 by|te doubl|
|000001b0| 65 73 20 6f 70 74 69 6f | 6e 20 73 65 74 0d 09 0d |es optio|n set...|
|000001c0| 09 2f 2a 75 73 65 20 73 | 68 6f 72 74 20 64 6f 75 |./*use s|hort dou|
|000001d0| 62 6c 65 20 69 6e 73 74 | 65 61 64 20 69 66 20 79 |ble inst|ead if y|
|000001e0| 6f 75 20 6e 65 65 64 20 | 38 20 62 79 74 65 20 49 |ou need |8 byte I|
|000001f0| 45 45 45 20 28 53 41 4e | 45 29 20 64 6f 75 62 6c |EEE (SAN|E) doubl|
|00000200| 65 73 2a 2f 0d 09 0d 23 | 65 6e 64 69 66 0d 0d 0d |es*/...#|endif...|
|00000210| 0d 42 6f 6f 6c 65 61 6e | 20 49 41 43 70 75 73 68 |.Boolean| IACpush|
|00000220| 64 6f 75 62 6c 65 70 61 | 72 61 6d 20 28 64 6f 75 |doublepa|ram (dou|
|00000230| 62 6c 65 20 76 61 6c 2c | 20 4f 53 54 79 70 65 20 |ble val,| OSType |
|00000240| 6b 65 79 77 6f 72 64 29 | 20 7b 0d 09 0d 09 72 65 |keyword)| {....re|
|00000250| 67 69 73 74 65 72 20 4f | 53 45 72 72 20 65 63 3b |gister O|SErr ec;|
|00000260| 0d 09 65 78 74 65 6e 64 | 65 64 20 76 61 6c 75 65 |..extend|ed value|
|00000270| 3b 0d 09 0d 09 23 69 66 | 64 65 66 20 75 73 65 53 |;....#if|def useS|
|00000280| 61 6e 65 09 0d 09 09 78 | 39 36 74 6f 78 38 30 20 |ane....x|96tox80 |
|00000290| 28 26 76 61 6c 2c 20 26 | 76 61 6c 75 65 29 3b 20 |(&val, &|value); |
|000002a0| 2f 2a 63 6f 6e 76 65 72 | 74 20 66 72 6f 6d 20 64 |/*conver|t from d|
|000002b0| 6f 75 62 6c 65 20 74 6f | 20 65 78 74 65 6e 64 65 |ouble to| extende|
|000002c0| 64 2a 2f 09 09 0d 09 23 | 65 6c 73 65 09 0d 09 09 |d*/....#|else....|
|000002d0| 76 61 6c 75 65 20 3d 20 | 76 61 6c 3b 20 2f 2a 6e |value = |val; /*n|
|000002e0| 6f 20 63 6f 6e 76 65 72 | 73 69 6f 6e 20 6e 65 65 |o conver|sion nee|
|000002f0| 64 65 64 2c 20 6a 75 73 | 74 20 63 6f 70 79 20 69 |ded, jus|t copy i|
|00000300| 74 2a 2f 09 09 0d 09 23 | 65 6e 64 69 66 0d 09 09 |t*/....#|endif...|
|00000310| 0d 09 65 63 20 3d 20 41 | 45 50 75 74 50 61 72 61 |..ec = A|EPutPara|
|00000320| 6d 50 74 72 20 28 0d 09 | 09 0d 09 09 49 41 43 67 |mPtr (..|....IACg|
|00000330| 6c 6f 62 61 6c 73 2e 65 | 76 65 6e 74 2c 20 28 41 |lobals.e|vent, (A|
|00000340| 45 4b 65 79 77 6f 72 64 | 29 20 6b 65 79 77 6f 72 |EKeyword|) keywor|
|00000350| 64 2c 20 74 79 70 65 45 | 78 74 65 6e 64 65 64 2c |d, typeE|xtended,|
|00000360| 20 0d 09 09 0d 09 09 28 | 50 74 72 29 20 26 76 61 | ......(|Ptr) &va|
|00000370| 6c 75 65 2c 20 73 69 7a | 65 6f 66 20 28 76 61 6c |lue, siz|eof (val|
|00000380| 75 65 29 29 3b 0d 09 09 | 0d 09 49 41 43 67 6c 6f |ue));...|..IACglo|
|00000390| 62 61 6c 73 2e 65 72 72 | 6f 72 63 6f 64 65 20 3d |bals.err|orcode =|
|000003a0| 20 65 63 3b 0d 09 0d 09 | 72 65 74 75 72 6e 20 28 | ec;....|return (|
|000003b0| 65 63 20 3d 3d 20 6e 6f | 45 72 72 29 3b 0d 09 7d |ec == no|Err);..}|
|000003c0| 20 2f 2a 49 41 43 70 75 | 73 68 64 6f 75 62 6c 65 | /*IACpu|shdouble|
|000003d0| 70 61 72 61 6d 2a 2f 0d | 0d 0d 42 6f 6f 6c 65 61 |param*/.|..Boolea|
|000003e0| 6e 20 49 41 43 72 65 74 | 75 72 6e 64 6f 75 62 6c |n IACret|urndoubl|
|000003f0| 65 20 28 64 6f 75 62 6c | 65 20 78 29 20 7b 0d 09 |e (doubl|e x) {..|
|00000400| 0d 09 72 65 67 69 73 74 | 65 72 20 4f 53 45 72 72 |..regist|er OSErr|
|00000410| 20 65 63 3b 0d 09 65 78 | 74 65 6e 64 65 64 20 76 | ec;..ex|tended v|
|00000420| 61 6c 75 65 3b 0d 09 0d | 09 23 69 66 64 65 66 20 |alue;...|.#ifdef |
|00000430| 75 73 65 53 61 6e 65 0d | 09 09 78 39 36 74 6f 78 |useSane.|..x96tox|
|00000440| 38 30 20 28 26 78 2c 20 | 26 76 61 6c 75 65 29 3b |80 (&x, |&value);|
|00000450| 0d 09 23 65 6c 73 65 0d | 09 09 76 61 6c 75 65 20 |..#else.|..value |
|00000460| 3d 20 78 3b 0d 09 23 65 | 6e 64 69 66 0d 09 09 0d |= x;..#e|ndif....|
|00000470| 09 65 63 20 3d 20 41 45 | 50 75 74 50 61 72 61 6d |.ec = AE|PutParam|
|00000480| 50 74 72 20 28 0d 09 09 | 0d 09 09 49 41 43 67 6c |Ptr (...|...IACgl|
|00000490| 6f 62 61 6c 73 2e 72 65 | 70 6c 79 2c 20 6b 65 79 |obals.re|ply, key|
|000004a0| 44 69 72 65 63 74 4f 62 | 6a 65 63 74 2c 20 74 79 |DirectOb|ject, ty|
|000004b0| 70 65 45 78 74 65 6e 64 | 65 64 2c 20 28 50 74 72 |peExtend|ed, (Ptr|
|000004c0| 29 26 76 61 6c 75 65 2c | 20 0d 09 09 0d 09 09 28 |)&value,| ......(|
|000004d0| 53 69 7a 65 29 20 73 69 | 7a 65 6f 66 20 28 76 61 |Size) si|zeof (va|
|000004e0| 6c 75 65 29 29 3b 0d 09 | 09 0d 09 49 41 43 67 6c |lue));..|...IACgl|
|000004f0| 6f 62 61 6c 73 2e 65 72 | 72 6f 72 63 6f 64 65 20 |obals.er|rorcode |
|00000500| 3d 20 65 63 3b 0d 09 0d | 09 72 65 74 75 72 6e 20 |= ec;...|.return |
|00000510| 28 65 63 20 3d 3d 20 6e | 6f 45 72 72 29 3b 0d 09 |(ec == n|oErr);..|
|00000520| 7d 20 2f 2a 49 41 43 72 | 65 74 75 72 6e 64 6f 75 |} /*IACr|eturndou|
|00000530| 62 6c 65 2a 2f 0d 0d 0d | 42 6f 6f 6c 65 61 6e 20 |ble*/...|Boolean |
|00000540| 49 41 43 67 65 74 64 6f | 75 62 6c 65 70 61 72 61 |IACgetdo|ublepara|
|00000550| 6d 20 28 4f 53 54 79 70 | 65 20 6b 65 79 77 6f 72 |m (OSTyp|e keywor|
|00000560| 64 2c 20 64 6f 75 62 6c | 65 20 2a 76 61 6c 29 20 |d, doubl|e *val) |
|00000570| 7b 0d 09 0d 09 72 65 67 | 69 73 74 65 72 20 4f 53 |{....reg|ister OS|
|00000580| 45 72 72 20 65 63 3b 0d | 09 44 65 73 63 54 79 70 |Err ec;.|.DescTyp|
|00000590| 65 20 61 63 74 75 61 6c | 74 79 70 65 3b 0d 09 53 |e actual|type;..S|
|000005a0| 69 7a 65 20 61 63 74 75 | 61 6c 73 69 7a 65 3b 0d |ize actu|alsize;.|
|000005b0| 09 65 78 74 65 6e 64 65 | 64 20 76 61 6c 75 65 3b |.extende|d value;|
|000005c0| 0d 09 0d 09 65 63 20 3d | 20 41 45 47 65 74 50 61 |....ec =| AEGetPa|
|000005d0| 72 61 6d 50 74 72 20 28 | 0d 09 09 0d 09 09 49 41 |ramPtr (|......IA|
|000005e0| 43 67 6c 6f 62 61 6c 73 | 2e 65 76 65 6e 74 2c 20 |Cglobals|.event, |
|000005f0| 28 41 45 4b 65 79 77 6f | 72 64 29 20 6b 65 79 77 |(AEKeywo|rd) keyw|
|00000600| 6f 72 64 2c 20 74 79 70 | 65 45 78 74 65 6e 64 65 |ord, typ|eExtende|
|00000610| 64 2c 20 0d 09 09 0d 09 | 09 26 61 63 74 75 61 6c |d, .....|.&actual|
|00000620| 74 79 70 65 2c 20 28 50 | 74 72 29 20 26 76 61 6c |type, (P|tr) &val|
|00000630| 75 65 2c 20 73 69 7a 65 | 6f 66 20 28 76 61 6c 75 |ue, size|of (valu|
|00000640| 65 29 2c 20 26 61 63 74 | 75 61 6c 73 69 7a 65 29 |e), &act|ualsize)|
|00000650| 3b 0d 09 0d 09 49 41 43 | 67 6c 6f 62 61 6c 73 2e |;....IAC|globals.|
|00000660| 65 72 72 6f 72 63 6f 64 | 65 20 3d 20 65 63 3b 0d |errorcod|e = ec;.|
|00000670| 09 0d 09 69 66 20 28 65 | 63 20 21 3d 20 6e 6f 45 |...if (e|c != noE|
|00000680| 72 72 29 20 7b 0d 09 09 | 0d 09 09 49 41 43 70 61 |rr) {...|...IACpa|
|00000690| 72 61 6d 65 72 72 6f 72 | 20 28 65 63 2c 20 22 5c |ramerror| (ec, "\|
|000006a0| 70 64 6f 75 62 6c 65 22 | 2c 20 6b 65 79 77 6f 72 |pdouble"|, keywor|
|000006b0| 64 29 3b 0d 09 09 0d 09 | 09 72 65 74 75 72 6e 20 |d);.....|.return |
|000006c0| 28 66 61 6c 73 65 29 3b | 0d 09 09 7d 0d 09 0d 09 |(false);|...}....|
|000006d0| 49 41 43 67 6c 6f 62 61 | 6c 73 2e 6e 65 78 74 70 |IACgloba|ls.nextp|
|000006e0| 61 72 61 6d 6f 70 74 69 | 6f 6e 61 6c 20 3d 20 66 |aramopti|onal = f|
|000006f0| 61 6c 73 65 3b 20 2f 2a | 6d 75 73 74 20 62 65 20 |alse; /*|must be |
|00000700| 72 65 73 65 74 20 66 6f | 72 20 65 61 63 68 20 70 |reset fo|r each p|
|00000710| 61 72 61 6d 2a 2f 0d 09 | 0d 09 23 69 66 64 65 66 |aram*/..|..#ifdef|
|00000720| 20 75 73 65 53 61 6e 65 | 0d 09 09 78 38 30 74 6f | useSane|...x80to|
|00000730| 78 39 36 20 28 26 76 61 | 6c 75 65 2c 20 76 61 6c |x96 (&va|lue, val|
|00000740| 29 3b 0d 09 23 65 6c 73 | 65 0d 09 09 2a 76 61 6c |);..#els|e...*val|
|00000750| 20 3d 20 76 61 6c 75 65 | 3b 0d 09 23 65 6e 64 69 | = value|;..#endi|
|00000760| 66 0d 0d 09 72 65 74 75 | 72 6e 20 28 74 72 75 65 |f...retu|rn (true|
|00000770| 29 3b 0d 09 7d 20 2f 2a | 49 41 43 67 65 74 64 6f |);..} /*|IACgetdo|
|00000780| 75 62 6c 65 70 61 72 61 | 6d 2a 2f 0d 09 0d 09 0d |ublepara|m*/.....|
|00000790| 42 6f 6f 6c 65 61 6e 20 | 49 41 43 67 65 74 64 6f |Boolean |IACgetdo|
|000007a0| 75 62 6c 65 69 74 65 6d | 20 28 41 45 44 65 73 63 |ubleitem| (AEDesc|
|000007b0| 4c 69 73 74 20 2a 6c 69 | 73 74 2c 20 6c 6f 6e 67 |List *li|st, long|
|000007c0| 20 6e 2c 20 64 6f 75 62 | 6c 65 20 2a 76 61 6c 29 | n, doub|le *val)|
|000007d0| 20 7b 0d 09 0d 09 72 65 | 67 69 73 74 65 72 20 4f | {....re|gister O|
|000007e0| 53 45 72 72 20 65 63 3b | 0d 09 65 78 74 65 6e 64 |SErr ec;|..extend|
|000007f0| 65 64 20 76 61 6c 75 65 | 3b 0d 09 44 65 73 63 54 |ed value|;..DescT|
|00000800| 79 70 65 20 6b 65 79 3b | 0d 09 44 65 73 63 54 79 |ype key;|..DescTy|
|00000810| 70 65 20 74 79 70 65 43 | 6f 64 65 3b 0d 09 53 69 |pe typeC|ode;..Si|
|00000820| 7a 65 20 61 63 74 75 61 | 6c 53 69 7a 65 3b 0d 0d |ze actua|lSize;..|
|00000830| 09 69 66 20 28 28 2a 6c | 69 73 74 29 2e 64 65 73 |.if ((*l|ist).des|
|00000840| 63 72 69 70 74 6f 72 54 | 79 70 65 20 3d 3d 20 74 |criptorT|ype == t|
|00000850| 79 70 65 41 45 52 65 63 | 6f 72 64 29 20 7b 0d 09 |ypeAERec|ord) {..|
|00000860| 09 0d 09 09 65 63 20 3d | 20 41 45 47 65 74 4b 65 |....ec =| AEGetKe|
|00000870| 79 50 74 72 20 28 6c 69 | 73 74 2c 20 6e 2c 20 74 |yPtr (li|st, n, t|
|00000880| 79 70 65 45 78 74 65 6e | 64 65 64 2c 20 26 74 79 |ypeExten|ded, &ty|
|00000890| 70 65 43 6f 64 65 2c 20 | 28 50 74 72 29 20 26 76 |peCode, |(Ptr) &v|
|000008a0| 61 6c 75 65 2c 20 73 69 | 7a 65 6f 66 20 28 76 61 |alue, si|zeof (va|
|000008b0| 6c 75 65 29 2c 20 26 61 | 63 74 75 61 6c 53 69 7a |lue), &a|ctualSiz|
|000008c0| 65 29 3b 0d 09 09 09 0d | 09 09 69 66 20 28 65 63 |e);.....|..if (ec|
|000008d0| 20 21 3d 20 65 72 72 41 | 45 44 65 73 63 4e 6f 74 | != errA|EDescNot|
|000008e0| 46 6f 75 6e 64 29 0d 09 | 09 09 67 6f 74 6f 20 64 |Found)..|..goto d|
|000008f0| 6f 6e 65 3b 0d 09 09 7d | 0d 09 0d 09 65 63 20 3d |one;...}|....ec =|
|00000900| 20 41 45 47 65 74 4e 74 | 68 50 74 72 20 28 6c 69 | AEGetNt|hPtr (li|
|00000910| 73 74 2c 20 6e 2c 20 74 | 79 70 65 45 78 74 65 6e |st, n, t|ypeExten|
|00000920| 64 65 64 2c 20 26 6b 65 | 79 2c 20 26 74 79 70 65 |ded, &ke|y, &type|
|00000930| 43 6f 64 65 2c 20 28 50 | 74 72 29 20 26 76 61 6c |Code, (P|tr) &val|
|00000940| 75 65 2c 20 73 69 7a 65 | 6f 66 20 28 76 61 6c 75 |ue, size|of (valu|
|00000950| 65 29 2c 20 26 61 63 74 | 75 61 6c 53 69 7a 65 29 |e), &act|ualSize)|
|00000960| 3b 0d 09 0d 09 64 6f 6e | 65 3a 0d 09 0d 09 49 41 |;....don|e:....IA|
|00000970| 43 67 6c 6f 62 61 6c 73 | 2e 65 72 72 6f 72 63 6f |Cglobals|.errorco|
|00000980| 64 65 20 3d 20 65 63 3b | 0d 09 0d 09 23 69 66 64 |de = ec;|....#ifd|
|00000990| 65 66 20 75 73 65 53 61 | 6e 65 0d 09 09 78 38 30 |ef useSa|ne...x80|
|000009a0| 74 6f 78 39 36 20 28 26 | 76 61 6c 75 65 2c 20 76 |tox96 (&|value, v|
|000009b0| 61 6c 29 3b 0d 09 23 65 | 6c 73 65 0d 09 09 2a 76 |al);..#e|lse...*v|
|000009c0| 61 6c 20 3d 20 76 61 6c | 75 65 3b 0d 09 23 65 6e |al = val|ue;..#en|
|000009d0| 64 69 66 0d 09 0d 09 72 | 65 74 75 72 6e 20 28 65 |dif....r|eturn (e|
|000009e0| 63 20 3d 3d 20 6e 6f 45 | 72 72 29 3b 0d 09 7d 20 |c == noE|rr);..} |
|000009f0| 2f 2a 49 41 43 67 65 74 | 64 6f 75 62 6c 65 69 74 |/*IACget|doubleit|
|00000a00| 65 6d 2a 2f 0d 0d 0d 42 | 6f 6f 6c 65 61 6e 20 49 |em*/...B|oolean I|
|00000a10| 41 43 70 75 73 68 64 6f | 75 62 6c 65 69 74 65 6d |ACpushdo|ubleitem|
|00000a20| 20 28 41 45 44 65 73 63 | 4c 69 73 74 20 2a 6c 69 | (AEDesc|List *li|
|00000a30| 73 74 2c 20 64 6f 75 62 | 6c 65 20 76 61 6c 2c 20 |st, doub|le val, |
|00000a40| 6c 6f 6e 67 20 6e 29 20 | 7b 0d 09 0d 09 72 65 67 |long n) |{....reg|
|00000a50| 69 73 74 65 72 20 4f 53 | 45 72 72 20 65 63 3b 0d |ister OS|Err ec;.|
|00000a60| 09 65 78 74 65 6e 64 65 | 64 09 76 61 6c 75 65 3b |.extende|d.value;|
|00000a70| 0d 0d 09 23 69 66 64 65 | 66 20 75 73 65 53 61 6e |...#ifde|f useSan|
|00000a80| 65 0d 09 09 78 39 36 74 | 6f 78 38 30 20 28 26 76 |e...x96t|ox80 (&v|
|00000a90| 61 6c 2c 20 26 76 61 6c | 75 65 29 3b 20 0d 09 23 |al, &val|ue); ..#|
|00000aa0| 65 6c 73 65 0d 09 09 76 | 61 6c 75 65 20 3d 20 76 |else...v|alue = v|
|00000ab0| 61 6c 3b 0d 09 23 65 6e | 64 69 66 0d 09 0d 09 69 |al;..#en|dif....i|
|00000ac0| 66 20 28 28 2a 6c 69 73 | 74 29 2e 64 65 73 63 72 |f ((*lis|t).descr|
|00000ad0| 69 70 74 6f 72 54 79 70 | 65 20 3d 3d 20 74 79 70 |iptorTyp|e == typ|
|00000ae0| 65 41 45 52 65 63 6f 72 | 64 29 0d 09 09 65 63 20 |eAERecor|d)...ec |
|00000af0| 3d 20 41 45 50 75 74 4b | 65 79 50 74 72 20 28 6c |= AEPutK|eyPtr (l|
|00000b00| 69 73 74 2c 20 6e 2c 20 | 74 79 70 65 45 78 74 65 |ist, n, |typeExte|
|00000b10| 6e 64 65 64 2c 20 28 50 | 74 72 29 26 76 61 6c 75 |nded, (P|tr)&valu|
|00000b20| 65 2c 20 73 69 7a 65 6f | 66 20 28 76 61 6c 75 65 |e, sizeo|f (value|
|00000b30| 29 29 3b 0d 09 65 6c 73 | 65 0d 09 09 65 63 20 3d |));..els|e...ec =|
|00000b40| 20 41 45 50 75 74 50 74 | 72 20 28 6c 69 73 74 2c | AEPutPt|r (list,|
|00000b50| 20 6e 2c 20 74 79 70 65 | 45 78 74 65 6e 64 65 64 | n, type|Extended|
|00000b60| 2c 20 28 50 74 72 29 26 | 76 61 6c 75 65 2c 20 73 |, (Ptr)&|value, s|
|00000b70| 69 7a 65 6f 66 20 28 76 | 61 6c 75 65 29 29 3b 0d |izeof (v|alue));.|
|00000b80| 09 0d 09 49 41 43 67 6c | 6f 62 61 6c 73 2e 65 72 |...IACgl|obals.er|
|00000b90| 72 6f 72 63 6f 64 65 20 | 3d 20 65 63 3b 0d 09 0d |rorcode |= ec;...|
|00000ba0| 09 72 65 74 75 72 6e 20 | 28 65 63 20 3d 3d 20 6e |.return |(ec == n|
|00000bb0| 6f 45 72 72 29 3b 0d 09 | 7d 20 2f 2a 49 41 43 70 |oErr);..|} /*IACp|
|00000bc0| 75 73 68 64 6f 75 62 6c | 65 69 74 65 6d 2a 2f 0d |ushdoubl|eitem*/.|
|00000bd0| 0d 0d 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c00| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 46 |.......L|...L...F|
|00000c10| 09 49 41 43 67 6c 6f 62 | 61 6c 73 2e 65 72 72 6f |.IACglob|als.erro|
|00000c20| 72 63 6f 64 65 20 3d 20 | 65 63 3b 0d 09 0d 09 69 |rcode = |ec;....i|
|00000c30| 0b 69 61 63 64 6f 75 62 | 6c 65 2e 63 02 00 00 00 |.iacdoub|le.c....|
|00000c40| 50 61 72 74 53 49 54 78 | 00 00 00 00 00 00 00 00 |PartSITx|........|
|00000c50| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|00000c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c70| 00 00 a9 81 44 d4 00 00 | 00 00 00 00 01 92 61 6c |....D...|......al|
|00000c80| 73 65 29 3b 0d 09 09 7d | 0d 09 0d 09 2a 68 62 69 |se);...}|....*hbi|
|00000c90| 6e 61 72 79 20 3d 20 72 | 65 73 75 6c 74 2e 64 61 |nary = r|esult.da|
|00000ca0| 74 61 48 61 6e 64 6c 65 | 3b 0d 09 0d 09 2a 62 69 |taHandle|;....*bi|
|00000cb0| 6e 61 72 79 74 79 70 65 | 20 3d 20 72 65 73 75 6c |narytype| = resul|
|00000cc0| 74 2e 64 65 73 63 72 69 | 70 74 6f 72 54 79 70 65 |t.descri|ptorType|
|00000cd0| 3b 0d 09 0d 09 49 41 43 | 67 6c 6f 62 61 6c 73 2e |;....IAC|globals.|
|00000ce0| 6e 65 78 74 70 61 72 61 | 6d 6f 70 74 69 6f 6e 61 |nextpara|moptiona|
|00000cf0| 6c 20 3d 20 66 61 6c 73 | 65 3b 20 2f 2a 6d 75 73 |l = fals|e; /*mus|
|00000d00| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00000d10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d20| 00 00 00 00 00 00 00 06 | 00 04 00 3d 00 0c 01 d7 |........|...=....|
|00000d30| 02 3c 00 3d 00 0c 01 d7 | 02 3c a8 23 aa 9b 00 00 |.<.=....|.<.#....|
|00000d40| 0b 67 00 00 0b 67 00 00 | 0a 98 01 00 00 00 01 00 |.g...g..|........|
|00000d50| 00 00 01 4c 00 00 00 4c | 00 00 00 46 00 ed 83 2c |...L...L|...F...,|
|00000d60| 16 68 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.h.....2|..MPSR..|
|00000d70| 00 0a 03 ed 00 00 00 00 | 00 00 00 ed 82 04 13 43 |........|.......C|
|00000d80| 72 65 61 74 65 64 20 62 | 79 20 43 4d 61 73 74 65 |reated b|y CMaste|
|00000d90| 72 aa 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |r.......|........|
|00000da0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+